Imports Microsoft.VisualBasic

Public Class HorasExtra
    Private _cantidad As Integer
    Private _fecha As String

    Public Sub New(ByVal cantidad As Integer, ByVal fecha As String)
        Me._cantidad = cantidad
        Me._fecha = fecha
    End Sub

    Public Property Cantidad() As Integer
        Get
            Return _cantidad
        End Get

        Set(ByVal value As Integer)
            _cantidad = value
        End Set
    End Property

    Public Property Fecha() As String
        Get
            Return _fecha
        End Get

        Set(ByVal value As String)
            _fecha = value
        End Set
    End Property
End Class
